home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 04p.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-06  |  2.2 KB  |  83 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gplaybtnsprite, gFNEngBtnSprite, zeoIdle, gFNEngBtnStart, gPcVidSprite
  3.   gKnobSprite = 14
  4.   gSendMovie = "04p"
  5.   zeoIdle = 0
  6.   gplaybtnsprite = 0
  7.   gFNEngBtnSprite = 24
  8.   gPcVidSprite = 11
  9.   gFNEngBtnStart = 0
  10.   puppetSprite(gFNEngBtnSprite, 1)
  11.   setUpKnob()
  12.   puppetSprite(48, 1)
  13.   gCursorReady = 1
  14.   set the mouseDownScript to EMPTY
  15.   set the mouseUpScript to EMPTY
  16. end
  17.  
  18. on stopMovie
  19.   global gplaybtnsprite, gFNEngBtnSprite, zeoIdle
  20.   puppetSprite(gFNEngBtnSprite, 0)
  21.   stopmovieqt()
  22.   gplaybtnsprite = 23
  23.   zeoIdle = 0
  24. end
  25.  
  26. on idle
  27.   global gCursorReady
  28.   if gCursorReady = 1 then
  29.     cursor(200)
  30.     checkCursors()
  31.     set the locH of sprite 48 to the mouseH
  32.     set the locV of sprite 48 to the mouseV
  33.     updateStage()
  34.   end if
  35.   qtidle()
  36. end
  37.  
  38. on checkCursors
  39.   global gMagCursor, zeoIdle
  40.   setzeoIdle()
  41.   set the castNum of sprite 48 to the number of member "curs1"
  42.   if the castNum of sprite 12 and (rollOver(10) and not zeoIdle) then
  43.     set the castNum of sprite 48 to the number of member "hotCursor"
  44.   end if
  45.   if the castNum of sprite 12 and rollOver(12) then
  46.     set the castNum of sprite 48 to the number of member "hotCursor"
  47.   end if
  48.   repeat with i = 15 to 17
  49.     if rollOver(i) then
  50.       set the castNum of sprite 48 to the number of member "hotCursor"
  51.     end if
  52.   end repeat
  53.   if the castNum of sprite 24 and rollOver(24) and zeoIdle then
  54.     set the castNum of sprite 48 to the number of member "hotCursor"
  55.   end if
  56.   repeat with i = 31 to 32
  57.     if rollOver(i) then
  58.       set the castNum of sprite 48 to the number of member "hotCursor"
  59.     end if
  60.   end repeat
  61.   if rollOver(40) and not zeoIdle then
  62.     set the castNum of sprite 48 to the number of member "hotCursor"
  63.   end if
  64.   repeat with i = 41 to 42
  65.     if rollOver(i) then
  66.       set the castNum of sprite 48 to the number of member "hotCursor"
  67.     end if
  68.   end repeat
  69.   if the castNum of sprite 47 and rollOver(47) then
  70.     set the castNum of sprite 48 to the number of member "hotCursor"
  71.   end if
  72. end
  73.  
  74. on setzeoIdle
  75.   global gPcVidSprite, zeoIdle
  76.   zeoIdle = 0
  77.   if the memberNum of sprite gPcVidSprite > 0 then
  78.     if sprite(gPcVidSprite).movieRate > 0 then
  79.       zeoIdle = 1
  80.     end if
  81.   end if
  82. end
  83.